home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / ddj0897.zip / DYN401.ZIP / class / intdict.c < prev    next >
C/C++ Source or Header  |  1997-04-16  |  4KB  |  142 lines
  1.  
  2.  
  3. /*  Copyright (c) 1993-1996 Algorithms Corporation  */
  4. /*  All rights reserved.  */
  5.  
  6.  
  7.  
  8.  
  9. /*  This file automatically generated by dpp - do not edit  */
  10.  
  11. #define    DPP_STRATEGY    2
  12. #define    DPP_FASTWIDE    0
  13.  
  14.  
  15.  
  16.  
  17. #define    CLASS    IntegerDictionary_c
  18. #define    ivType    IntegerDictionary_iv_t
  19.  
  20. #include "generics.h"
  21.  
  22. object    IntegerDictionary_c;
  23.  
  24.  
  25. #line 22 "intdict.d"
  26. #include "set1.h" 
  27.  
  28.  
  29.  
  30. #define LTYPE 4 
  31.  
  32. static gLookup_t Lookup; 
  33.  
  34. imeth objrtn IntegerDictionary_im_gAddInt(object self, int key, object value)
  35. { 
  36.     ChkArgNul(value, 3); 
  37.     return Lookup(self, (object) &key, HT_ADD, 0, LTYPE, value); 
  38. } 
  39.  
  40. imeth objrtn IntegerDictionary_im_gFindValueInt(object self, int key)
  41. { 
  42.     object x; 
  43.  
  44.     x = Lookup(self, (object) &key, HT_FIND, 0, LTYPE, NULL); 
  45.     return x ? gValue(x) : x; 
  46. } 
  47.  
  48. imeth objrtn IntegerDictionary_im_gFindInt(object self, int key)
  49. { 
  50.     return Lookup(self, (object) &key, HT_FIND, 0, LTYPE, NULL); 
  51. } 
  52.  
  53. imeth objrtn IntegerDictionary_im_gChangeValueWithInt(object self, int key, object val)
  54. { 
  55.     object x; 
  56.     ChkArgNul(val, 3); 
  57.     x = Lookup(self, (object) &key, HT_FIND, 0, LTYPE, NULL); 
  58.     return x ? gChangeValue(x, val) : x; 
  59. } 
  60.  
  61. imeth objrtn IntegerDictionary_im_gFindAddInt(object self, int key, object value)
  62. { 
  63.     ChkArgNul(value, 3); 
  64.     return Lookup(self, (object) &key, HT_FINDADD, 0, LTYPE, value); 
  65. } 
  66.  
  67. imeth objrtn IntegerDictionary_im_gDispose(object self)
  68. { 
  69.     return gDispose1(self); 
  70. } 
  71.  
  72. imeth objrtn IntegerDictionary_im_gDisposeAllNodes(object self)
  73. { 
  74.     return gDisposeAllNodes1(self); 
  75. } 
  76.  
  77. imeth objrtn IntegerDictionary_im_gRemoveInt(object self, int key)
  78. { 
  79.     return Lookup(self, (object) &key, HT_DELETE, 1, LTYPE, NULL); 
  80. } 
  81.  
  82. imeth objrtn IntegerDictionary_im_gDeepDisposeInt(object self, int key)
  83. { 
  84.     return Lookup(self, (object) &key, HT_DELETE, 2, LTYPE, NULL); 
  85. } 
  86.  
  87. static void init_class(void) 
  88. { 
  89.     Lookup = imcPointer(Set, gLookup); 
  90. } 
  91.  
  92. #line 93 "intdict.c"
  93.  
  94. objrtn    IntegerDictionary_initialize(void)
  95. {
  96.     static  CRITICALSECTION  cs;
  97.     static  int volatile once = 0;
  98.  
  99.     ENTERCRITICALSECTION(_CI_CS_);
  100.     if (!once) {
  101.         INITIALIZECRITICALSECTION(cs);
  102.         once = 1;
  103.     }
  104.     LEAVECRITICALSECTION(_CI_CS_);
  105.  
  106.     ENTERCRITICALSECTION(cs);
  107.  
  108.     if (IntegerDictionary_c) {
  109.         LEAVECRITICALSECTION(cs);
  110.         return IntegerDictionary_c;
  111.     }
  112.     INHIBIT_THREADER;
  113.     Set_initialize();
  114.     if (IntegerDictionary_c)  {
  115.         ENABLE_THREADER;
  116.         LEAVECRITICALSECTION(cs);
  117.         return IntegerDictionary_c;
  118.     }
  119.     IntegerDictionary_c = gNewClass(Class, "IntegerDictionary", 0, 0, Set, END);
  120.     iMethodFor(IntegerDictionary, gChangeValueWithInt, IntegerDictionary_im_gChangeValueWithInt);
  121.     iMethodFor(IntegerDictionary, gDeepDisposeInt, IntegerDictionary_im_gDeepDisposeInt);
  122.     iMethodFor(IntegerDictionary, gDisposeInt, IntegerDictionary_im_gDeepDisposeInt);
  123.     iMethodFor(IntegerDictionary, gDisposeAllNodes, IntegerDictionary_im_gDisposeAllNodes);
  124.     iMethodFor(IntegerDictionary, gRemoveInt, IntegerDictionary_im_gRemoveInt);
  125.     iMethodFor(IntegerDictionary, gFindInt, IntegerDictionary_im_gFindInt);
  126.     iMethodFor(IntegerDictionary, gFindValueInt, IntegerDictionary_im_gFindValueInt);
  127.     iMethodFor(IntegerDictionary, gDispose, IntegerDictionary_im_gDispose);
  128.     iMethodFor(IntegerDictionary, gAddInt, IntegerDictionary_im_gAddInt);
  129.     iMethodFor(IntegerDictionary, gFindAddInt, IntegerDictionary_im_gFindAddInt);
  130.  
  131.     init_class();
  132.  
  133.     ENABLE_THREADER;
  134.  
  135.     LEAVECRITICALSECTION(cs);
  136.  
  137.     return IntegerDictionary_c;
  138. }
  139.  
  140.  
  141.  
  142.